home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / comm / cnet / cnettoolkit2a.lha / Routines / PMENU < prev    next >
Text File  |  1994-12-13  |  108b  |  3 lines
  1. PMENU: procedure;arg p,m;m=index('SNUPB',left(m,1))-1
  2.   getuser 2121864+(p*24);return bittst(d2c(result),m)
  3.